約 4,959,103 件
https://w.atwiki.jp/mynote/pages/88.html
Tesseract（テッセラクト） インストール Macの場合 Macportでインストール $sudo port install tesseract さくらサーバーの場合 Leptonicaのインストール wgetでダウンロード $wget http //leptonica.org/source/leptonica-1.68.tar.gz tar xvf leptonica-1.xx.tar.gz ./configure --prefix=/home/XXX/local/bin make make install tessractのインストール ./configure --prefix=/home/epushi/local/bin CPPFLAGS="-I/home/epushi/local/bin/include" LDFLAGS="-L/home/epushi/local/lib" LIBLEPT_HEADERSDIR="/home/epushi/local/include" Link http //hints.macworld.com/article.php?story=2010021805585497 https //trac.macports.org/ticket/32075 macportsとhomebrewまとめろ http //tech.caph.jp/2011/04/06/homebrew%E3%81%AE%E5%B0%8E%E5%85%A5%E3%81%A8%E4%BD%BF%E3%81%84%E6%96%B9/ http //blog.asial.co.jp/371 %./configure --help `configure configures tesseract 3.01 to adapt to many kinds of systems. Usage ./configure [OPTION]... [VAR=VALUE]... To assign environment variables (e.g., CC, CFLAGS...), specify them as VAR=VALUE. See below for descriptions of some of the useful variables. Defaults for the options are specified in brackets. Configuration -h, --help display this help and exit --help=short display options specific to this package --help=recursive display the short help of all the included packages -V, --version display version information and exit -q, --quiet, --silent do not print `checking... messages --cache-file=FILE cache test results in FILE [disabled] -C, --config-cache alias for `--cache-file=config.cache -n, --no-create do not create output files --srcdir=DIR find the sources in DIR [configure dir or `.. ] Installation directories --prefix=PREFIX install architecture-independent files in PREFIX [/usr/local] --exec-prefix=EPREFIX install architecture-dependent files in EPREFIX [PREFIX] By default, `make install will install all the files in `/usr/local/bin , `/usr/local/lib etc. You can specify an installation prefix other than `/usr/local using `--prefix , for instance `--prefix=$HOME . For better control, use the options below. Fine tuning of the installation directories --bindir=DIR user executables [EPREFIX/bin] --sbindir=DIR system admin executables [EPREFIX/sbin] --libexecdir=DIR program executables [EPREFIX/libexec] --sysconfdir=DIR read-only single-machine data [PREFIX/etc] --sharedstatedir=DIR modifiable architecture-independent data [PREFIX/com] --localstatedir=DIR modifiable single-machine data [PREFIX/var] --libdir=DIR object code libraries [EPREFIX/lib] --includedir=DIR C header files [PREFIX/include] --oldincludedir=DIR C header files for non-gcc [/usr/include] --datarootdir=DIR read-only arch.-independent data root [PREFIX/share] --datadir=DIR read-only architecture-independent data [DATAROOTDIR] --infodir=DIR info documentation [DATAROOTDIR/info] --localedir=DIR locale-dependent data [DATAROOTDIR/locale] --mandir=DIR man documentation [DATAROOTDIR/man] --docdir=DIR documentation root [DATAROOTDIR/doc/tesseract] --htmldir=DIR html documentation [DOCDIR] --dvidir=DIR dvi documentation [DOCDIR] --pdfdir=DIR pdf documentation [DOCDIR] --psdir=DIR ps documentation [DOCDIR] Program names --program-prefix=PREFIX prepend PREFIX to installed program names --program-suffix=SUFFIX append SUFFIX to installed program names --program-transform-name=PROGRAM run sed PROGRAM on installed program names System types --build=BUILD configure for building on BUILD [guessed] --host=HOST cross-compile to build programs to run on HOST [BUILD] Optional Features --disable-option-checking ignore unrecognized --enable/--with options --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) --enable-FEATURE[=ARG] include FEATURE [ARG=yes] --enable-graphics Enable graphics (ScrollView) (default). --enable-multiple-libraries Enable multiple libraries. --enable-shared[=PKGS] build shared libraries [default=yes] --enable-static[=PKGS] build static libraries [default=yes] --enable-fast-install[=PKGS] optimize for fast installation [default=yes] --disable-libtool-lock avoid locking (might break parallel builds) --disable-dependency-tracking speeds up one-time build --enable-dependency-tracking do not reject slow dependency extractors --enable-maintainer-mode enable make rules and dependencies not useful (and sometimes confusing) to the casual installer --disable-largefile omit support for large files Optional Packages --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) --with-extra-includes=DIR Define an additional directory for include files --with-extra-libraries=DIR Define an additional directory for library files --with-pic try to use only PIC/non-PIC objects [default=use both] --with-gnu-ld assume the C compiler uses GNU ld [default=no] Some influential environment variables CXX C++ compiler command CXXFLAGS C++ compiler flags LDFLAGS linker flags, e.g. -L lib dir if you have libraries in a nonstandard directory lib dir LIBS libraries to pass to the linker, e.g. -l library CPPFLAGS (Objective) C/C++ preprocessor flags, e.g. -I include dir if you have headers in a nonstandard directory include dir CC C compiler command CFLAGS C compiler flags CPP C preprocessor CXXCPP C++ preprocessor LIBLEPT_HEADERSDIR Leptonica headers directory Use these variables to override the choices made by `configure or to help it to find libraries and programs with nonstandard names/locations. Report bugs to theraysmith@gmail.com .
https://w.atwiki.jp/vocaloidenglishlyric/pages/504.html
【Tags Lapis Machigerita-P tA tR tT G】 Original Music title 極彩、嬋娟ノ魚。 English music title Richly Colored, Fascinatingly Beautiful Fish. Romaji music title Gokusai, Senken no Sakana. Music Lyrics written, Voice edited by マチゲリータP (Machigerita-P) Music arranged by マチゲリータP (Machigerita-P) Singer(s) 蒼姫ラピス (Aoki Lapis) Click here for the original Japanese Lyrics English Lyrics (translated by blacksaingrain)： At the blackly slimy summer night, shall we talk about love? "Beautiful, You re a fishy" The richly-colored scales are beautiful. Stars showing it teeth and sneering swim like ranchu. Their sharpness is as if... "Like lapis lazuli" She was ardently in love with the color of light kimono flowing on the other side of the river. "I have to go to the other side at once" In the lunar July, the month of opening letters "Prayers that people write down will sink into the river and they ll be stars" Stars wriggle and increase The prayer adorned at the edge of a leaf of a bamboo reached every corner of the river "Let s go ahead to the other side. If I can talk with you again, even the pain and the suffering are..." And so, "the fish" Started to swim in the river. Between the sharp stars. (Started to swim. Between the sharp stars.) While swimming, the stars tore the body of the fish and scraped the scales off the fish, and the unclosed eyes were in a puddle of blood (While swimming, the scales were scraped off, and the unclosed eyes were in a puddle of blood) She wanted to meet him, even if she would need to sacrifice anything (I wanted to meet you, even if I would need to sacrifice anything) Even in the pain that suffers her so many times, she loved him. (Even in the pain, I loved you) But this is the sad fate for the dead who suicide oneself. (But, as this is the sad fate for the dead who suicide oneself.) She could not cross "the border" called "the River of Heaven", which separates "heaven" and "earth" (I could not cross the border) 2 45 As it is called, "the River of Heaven" was a border that separates "heaven" and "earth". Foolishly, "the fish" fallen to "the earth" tried to cross the border. Prayers people write down in "this world" rise up into the "the River of Heaven", And the prayers become stars and fill the river not to make it impossible to come and go between "heaven" and "earth". "The fish" that went into "the River of Heaven" was cut up its body and died, Because of the sharpness of "As long as live" which are called "stars" and float to maintain the balance. Did it happen because of self-reproach or redemption? No one knows the truth. Only the thing left behind was a word "Tanabata". [Translation Notes] In some parts, Lapis doesn t sing the lyrics dispalyed on the video. The River of Heaven is what is called Milky way in English. Romaji lyrics (transliterated by blacksaingrain)： kuroku numeru natsu no yoru ni koi wo katarai mashou ka. "kirei, kimi wa, o-sakana-san." gokusaishiki no uroko, utsukushii. ha wo mukidashite warau hoshi, ranchuu no youni oyogu. sanagara sono surudosa wa. "seikinseki no you. " mukougishi, tanabiku usuginu no iro ni koikogareta. "hayaku achiragawa e mukawanai to. " fumihiroge-zuki. "hito no tsuduru, inori tachi ga, kawa ni shizumi, hoshi ni naru no sa." ugomekinagara fueru hoshi . sasa no ha no hashi ni kazaru inori ga, kono kawa no sumizumi ni made todoita "achiragawa e mukaimashou. anata to mata hanaseru no naraba, kono itami mo kono kurushimi sae mo. " koushite "sakana" wa (oyogidashita. surudoi hoshi-boshi no sukima wo.) (oyogu sanaka hoshiboshi wa, uroko wa tore, chidamari no, tojinu me.) (nani wo gisei ni shitemo, anata ni aitakatta.) (sono kutsuu no naka demo aishiteru) (demo, kore wa mizukara inochi wo tatta shinin ga yue no kanashii sadame desu kara.) ("sakai" wo koeru koto wa dekinakatta.) [Machigerita-P, MachigeriitaP, MachigeritaP, Machigeriita-P]
https://w.atwiki.jp/capsulecorp/pages/27.html
Froilisa s Page #twitter_widget_profile 安全衛生管理者
https://w.atwiki.jp/memo77/pages/27.html
PageLastUpdate 2010-10-14/total - /today - /yesterday - クリックすると見出し一覧を表示します Windows Server 2008からはドメイン内で複数のパスワードポリシーを設定できる グループ ポリシー オブジェクトにクリスタル レポートの64bit向けmsiパッケージを追加しようとするとエラー レジストリの有無を確認した上で、存在すればレジストリを削除 Windows 2000 では「gpupdate /force」ではなく「secedit /refreshpolicy」 XPクライアントに特定のユーザー／グループのみログインを許可する WSUSで承認された更新プログラムをすぐにクライアントに反映させる DHCPでルーティングを設定 Domain Computersのローカル管理者パスワードを任意の値に変更する1.Domain Computersのみ閲覧可能な共有フォルダを作成 2.スタートップスクリプトで起動時にローカル管理者パスワードの変更チェック用ファイルを生成 3.タスクスケジューラーが１時間に1回LocalAdminChange.vbsを実行 備考 Acrobat Reader 8が「内部エラー 2753。Updater.api_NON_OPT」でアンインストールできない Excelファイルの個人情報を削除してもプリンタのパスが残る Bullzip PDF Printerのサイレントインストール関連記事 2008/12/17追記 VBScriptでフォルダのアクセス権におけるユーザーの継承元を調べる 「Word/Excel/PowerPoint 2007 ファイル形式用 Microsoft Office 互換機能パック」をWSUSで配布する コンピュータ名の一覧を元にローカルAdministratorのパスワードを変更するスクリプト ローカル管理者としてドメインユーザーを追加/削除する LDAPとログインIDを指定してユーザーオブジェクトを取得する関数呼び出し方 関数本体 ファイルサーバーリソースマネージャ用にSMTPサーバーを立てる WSHで配列の比較にScripting.Dictionaryを使って高速化サンプルソース テキストファイルからユーザーの一覧を読み込んで「ユーザーは次回ログオン時にパスワード変更が必要」に設定参考アドレス グループポリシーオブジェクトエディタで設定した項目がレポートで正しい名称で表示されない コンピュータのSIDの取得 SIDについての詳細な記事があったのでメモ Windows 2000 と Windows XP のコンピュータ アカウントのリセット ローカル管理者のパスワードを一括で更新するスクリプト SQLServer200のサイレントインストール setup.exeでサイレントインストール Windows Server 2003 R2 でファイル サーバー リソース マネージャを有効にする アプリケーションログに5分おきにイベント1030と1058が記録される。 dsaddを使ってActive Directoryにユーザーを追加する グループポリシーオブジェクトエディタでびっくり レジストリの配布をグループポリシーでやるべきか 無線環境のPCにグループポリシーでアプリケーションを配布する。 admファイルを使用してレジストリを配布する ローカルセキュリティポリシーはDefault Domain Controllers Policyでなければ有効にならない？ Acrobat Reader 8.1をmsiファイルで配布するFlash Player をmsiファイルで配布する コンピュータ名の長さの制限など ADSI関連で物凄く参考になるサイト スクリプトでOutlook Expressのアカウントを修正する ACLからフルコントロールを持つアカウントを削除してしまった場合の対処 ちゃうねん 信頼関係 Defaul Domain Policyの 復旧 comment Windows Server 2008からはドメイン内で複数のパスワードポリシーを設定できる 2010/04/30 http //technet.microsoft.com/ja-jp/library/cc770394(WS.10).aspx これしらなかったのでメモ。 グループ ポリシー オブジェクトにクリスタル レポートの64bit向けmsiパッケージを追加しようとするとエラー 2009/12/01 ドメインコントローラー Windows Server 2003 R2(32bit) 対象クライアント Windows 7 Professonal 64bit Japanese 使用したパッケージ CRRedist2005_X64.msi、CRRedist2005_X64_JP.msi Windows 7の64bit版導入に伴ってクリスタル レポートをGPOで配布しようとしたところ 追加操作でエラーが発生しました。パッケージから展開情報を抽出できませんでした。 パッケージが正しいことを確認するためにパッケージの確認を実行してください。 GPO を作成できません。 と怒られる。 KB324886が出ているけれど、これはWindows2000向けで特に64bitとか関係なさそう。Windows2003で関連する情報を見つけることはできなかった。 専用のGPOを作成したので32bitと64bitの混在とかそういう問題ではないっぽい。 もしかしてサーバーが32bitOSだと、64bit用のパッケージは展開できないのだろうか。 とりあえず1台だけだったので手動で設定したが、今後台数が増えるとめんどくさい。 未解決なのでわかる方がいましたら教えてください。 → 2010/10/13解決 2008R2、64bitのサーバーをメンバサーバーとして追加。グループポリシー管理エディタを機能として追加。 そのサーバーからGPOを設定することで回避できました。ドメコンではなくメンバサーバーでよいので助かった。 ただ誰でも使える方法ではないので本当は解決とは言い難いですね。 レジストリの有無を確認した上で、存在すればレジストリを削除 2009/11/10 On Error Resume Next strRegValue = wss.RegRead("レジストリのパス") On Error Goto 0 If strRegValue "" Then wss.RegDelete("レジストリのパス") End If Windows 2000 では「gpupdate /force」ではなく「secedit /refreshpolicy」 2009/04/27 http //www.atmarkit.co.jp/fwin2k/win2ktips/616gpupdate/gpupdate.html secedit /refreshpolicy XPクライアントに特定のユーザー／グループのみログインを許可する 2009/04/02 1.[コンピュータの管理]-[ローカル ユーザーとグループ]-[グループ]を開く 2.Usersから下記の3グループを削除 Domain Users NT AUTHORITY\Authenticated Users (S-1-5-11) NT AUTHORITY\INTERACTIVE (S-1-5-4) 3.ログインさせたいユーザー／グループを追加 いちおうこの手順でできた。[Domain Users]だけではダメ。 [NT AUTHORITY\Authenticated Users (S-1-5-11)]を抜いてもダメ。 [NT AUTHORITY\INTERACTIVE (S-1-5-4)]まで抜いたら期待通りに動作しました。 ただし、まだ様々な動作で不具合が出るかどうか未検証。 WSUSで承認された更新プログラムをすぐにクライアントに反映させる 2009/04/01 基本は更新プログラムの承認時に[更新の承認]→[期日]で日時指定をしておくことですが、コマンドラインからやりたい場合は wuauclt.exe /resetauthorization /detectnow でできる。 DHCPでルーティングを設定 2009/02/17 xxx.yyy.0.0のネットワークでデフォルトゲートウェイはxxx.yyy.0.250だとする。 xxx.zzz.0.0への接続だけxxx.yyy.0.251のゲートウェイ(ルーター)に振り分けたい。 1.まずDHCPではなくコマンドラインで設定してテストして見る route add xxx.yyy.0.0 mask 255.255.0.0 xxx.yyy.0.251 2.設定できたか確認 route print 3.経路情報を確認 tracert xxx.yyy.0.0 4.テスト用の接続情報を削除 route delete xxx.yyy.0.0 5.DHCPにてスコープオプションに「249 クラスレス静的ルート」にチェックを入れて下記の通り設定。 宛先：xxx.zzz.0.0 マスク：255.255.0.0 ルーター：xxx.yyy.0.251 6.経路情報を確認 tracert xxx.yyy.0.0 とりあえず俺がわかっていなかったので超簡略化して書いておく。 aaa.bbb.0.0で0を指定した後ろ二つは1-255の範囲を指すことになる。サブネットマスクは255.255.0.0。 aaa.bbb.ccc.0に対してならサブネットマスクは255.255.255.0のようにすればよい。 この理解だけだと間違いなので、この記事とか読んで理解してから設定しないと痛い目みるかも。 http //www.atmarkit.co.jp/fnetwork/netcom/route/route.html Domain Computersのローカル管理者パスワードを任意の値に変更する 2009/02/04 スタートアップ スクリプトとタスク スケジューラーを併用することで実現しています。 ここに辿り着くまでの経緯 Administratorは使用不可にしてもセーフモードで起動すると使えてしまう。対策はパスワードを困難なものにするしかない。できれば定期的に変更する。 Windowsの基本機能のみで実装する。 100台以上のDomain Computersすべてをループしてチェックすると、電源の入っていないPCなどの応答待ちでスクリプトの実行時間が長すぎる。 スタートアップ スクリプトを使用して、起動したコンピュータのみチェックすることで負荷を軽減する。 コンピューターから見えないスクリプトは実行できないが、スクリプトにパスワードを書くと閲覧される危険性がある。 パスワードを変更するたびにexeを差し替えたりするのは望ましくない。exeから逆コンパイルされる可能性も高い。 タスク スケジューラーであれば、コンピューターから見えないスクリプトを実行可能。 タスク スケジューラーはウィザードでは１日単位しか設定できないが、設定した後にプロパティで「9 00から17 00まで1時間ごとに繰り返し実行」のような指定ができる（不親切。最初にタスク登録しようとしたときは「１日単位しかできないのかよ！」と思って諦めていた。） 1.Domain Computersのみ閲覧可能な共有フォルダを作成 \\MyServer\LocalAdminCheck 2.スタートップスクリプトで起動時にローカル管理者パスワードの変更チェック用ファイルを生成 Set net = CreateObject("WScript.Network") Set fso = CreateObject("Scripting.FileSystemObject") donePath = "\\MyServer\LocalAdminCheck\Done\" net.ComputerName ".txt" undonePath = "\\MyServer\LocalAdminCheck\Undone\" net.ComputerName ".txt" IF fso.FileExists(donePath) = False Then set fp = fso.CreateTextFile(undonePath,True) fp.Close End If 3.タスクスケジューラーが１時間に1回LocalAdminChange.vbsを実行 このスクリプトは共有されていないフォルダに置きます。 Set fso = CreateObject("Scripting.FileSystemObject") doneFolder = "\\MyServer\LocalAdminCheck\Done" undoneFolder = "\\MyServer\LocalAdminCheck\Undone" For Each file In fso.GetFolder(undoneFolder).Files targetName = fso.GetBaseName(file.Path) donePath = doneFolder "\" targetName ".txt" undonePath = undoneFolder "\" targetName ".txt" On Error Resume Next Set objUser = GetObject("WinNT //" targetName "/Administrator, user") Select Case Err Case 0 objUser.SetPassword "ここにパスワードを記述" objUser.SetInfo set fp = fso.CreateTextFile(donePath,True) パスワードが設定できたら、このスクリプトの更新日をDoneフォルダのコンピュータ名.txtに出力 fp.Writeline fso.GetFile(Wscript.ScriptFullName).DateLastModified fp.Close Undoneフォルダから削除 file.Delete Case Else 設定できなかったら、エラーコードをUndoneフォルダのコンピュータ名.txtに出力 set fp = fso.CreateTextFile(undonePath,True) fp.writeline Err fp.Close End Select Next 備考 まあここまでできれば、パスワードを定期的に変更しつつそれをログに記録していくとかどうにでも組めますね。 １台づつパスワード変えたければ日時とコンピュータ名でハッシュ化しちゃうとかいろいろ。 懸念として意図しないコンピュータ名をフォルダに送り込まれる可能性がありますが、ローカル管理者のパスワードを推測不能「こちらに既知で相手に未知」なものに変更されてもそれほどダメージはないのでよしとしておきます。 Acrobat Reader 8が「内部エラー 2753。Updater.api_NON_OPT」でアンインストールできない 2009/01/09 検索後：アップデート http //www.adobeforums.com/webx/.3c05d1a2 グループポリシーでAcrobat Reader 9を配布したら、なぜかこける。 ログを確認したらでAcrobat Reader 8のアンインストールでこけている。 手作業でアンインストールしてみると「内部エラー 2753。Updater.api_NON_OPT」。 エラーメッセージで検索すると、パッチが当たっているとアンインストールできないらしい。馬鹿だ。 Adobeのサイトにはめんどくさい方法が書いてあったけど、下記レジストリを削っちゃえばOK。 REG DELETE HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Installer\Features\68AB67CA7DA71401B7448A0100000030 REG DELETE HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Installer\Products\68AB67CA7DA71401B7448A0100000030 Excelファイルの個人情報を削除してもプリンタのパスが残る 2008/06/17 Excel 2002を元に記述していますので、2003は同じだと とりあえず下記を参考にすると、ファイルのプロパティ情報を消して、下記設定をすればいいように読めます。 http //office.microsoft.com/ja-jp/excel/HP010503321041.aspx [ツール]→[オプション]→[セキュリティ] タブ→[保存時にファイルのプロパティから個人情報を削除する] チェック ボックスをオンに。 ところがこれだけだと不完全で、メモ帳で開いてみるとわかりますが、プリンタのパスが残っています。 ドメイン環境で使っていると、どこの会社から出たものかモロバレですねｗ 会社名が残るとまずい場合は、ローカルプリンタで印刷してから上書き保存しましょう。 Bullzip PDF Printerのサイレントインストール 2008/05/30 フリーのPDF生成プリンタドライバ。商用利用も無料。 ダウンロード → http //www.bullzip.com/products/pdf/info.php#download ドキュメント → http //www.biopdf.com/guide/ セットアップファイルはexeのみ。msiは提供されていないので、サイレントインストールをするには少し準備が必要。 1.http //www.bullzip.com/products/pdf/info.php#downloadから本t内をダウンロード。解凍して、適切な配布用フォルダに置く。 2.http //www.bullzip.com/download/gsl/gslite.exeからgslite.exeをダウンロード。本体と同じ配布用フォルダに置く。 3.何らかの方法で BullzipPDFPrinter_5_0_0_609.exe /VERYSILENT /NORESTART をクライアントに実行させます。管理者権限が必要なのでスタートアップスクリプトがよいと思いますが、実行するたびにプリンタが増えていくので注意。 関連記事 http //gigazine.net/index.php?/news/comments/20080116_bullzip_pdf_printer/ 2008/12/17追記 今日気づいたけど最新版は商用利用は10ユーザーに制限されているっぽい。 過去のバージョンまで遡及適用かどうかこれから調査。 VBScriptでフォルダのアクセス権におけるユーザーの継承元を調べる 2008/05/26 http //q.hatena.ne.jp/1210910352 「Word/Excel/PowerPoint 2007 ファイル形式用 Microsoft Office 互換機能パック」をWSUSで配布する 2008/05/16 互換機能パックは下記からダウンロードできますが、配布形態はexeのみでmsiがありません。 http //www.microsoft.com/downloads/details.aspx?displaylang=ja FamilyID=941b3470-3ae9-4aee-8f43-c6bb74cd1466 コマンドラインで次のように入力しmsiファイルと関連データを取り出します。 FileFormatConverters.exe /extract c \temp\ →[マイクロソフト ソフトウェア ライセンス条項に同意するにはここをクリックしてください]にチェックを入れて[次へ]→「ファイルが正常に解凍されました。」 /extract で指定したパスにmsiファイルと関連ファイルが解凍されるので、配布用のフォルダにすべてコピーします。 あとは普通にグループポリシーで配布設定をすればOKです。 ちなみにサービスパックが出ているので、WSUSでサービスパックの配布をするのも忘れないようにしましょう。 コンピュータ名の一覧を元にローカルAdministratorのパスワードを変更するスクリプト 2008/05/14 はてなの質問に回答。 すべての端末の電源が入っているとは限らないので、ログを取れるようにした。 失敗しているものだけ再度リストにして流す必要あり。 パスワードを直接記述している以上、このスクリプトを見られることは深刻な脆弱性に繋がるので注意。 【書換必須】コンピュータを列挙したファイルパス。コンピュータごとに改行。 strListPath = "C \Documents and Settings\Administrator\デスクトップ\List.txt" 【書換必須】結果を出力するログファイルパス。 strLogPath = "C \Documents and Settings\Administrator\デスクトップ\Log.txt" 【書換必須】指定したい管理者パスワード strPWD = "czBnkbe+47i" Set fso = CreateObject( "Scripting.FileSystemObject" ) Set ts = fso.OpenTextFile( strListPath, 1 ) lines = Split( ts.ReadAll, vbCrLf ) ts.Close set tsLog = fso.CreateTextFile(strLogPath,True) On Error Resume Next For i = 0 to Ubound(lines) - 1 strComputer = lines(i) Set objUser = GetObject("WinNT //" strComputer "/Administrator, user") objUser.SetPassword strPWD objUser.SetInfo tsLog.WriteLine(strComputer "," Err.Number " " Err.Description) Err.Clear Next tsLog.Close Msgbox "Finish!" ローカル管理者としてドメインユーザーを追加/削除する 2008/04/18 遠隔地のPCにリモートで繋がらない。プリンタドライバをインストールしたいだけなんだけど。 とりあえず緊急回避としてユーザーに自分でインストールしてもらうことに。 Domain Admin権限を与えるのはイヤだったので、スクリプトで一時的にローカル管理者にすることに。 最初LDAPでユーザーオブジェクト取得して突っ込もうとするとコケる。下の関数がその名残ですｗ 調べてみたら、WinNTプロバイダを使わなくちゃいけないんですってさ。 http //www.microsoft.com/japan/technet/scriptcenter/resources/qanda/oct04/hey1008.mspx strComputer = "hoge" strUser = "moge" Set objGroup = GetObject("WinNT //" strComputer "/Administrators") Set objUser = GetObject("WinNT //example.co.jp/" strUser) objGroup.Add(objUser.AdsPath) objGroup.Remove(objUser.AdsPath) MsgBox "終了しました" LDAPとログインIDを指定してユーザーオブジェクトを取得する関数 2008/04/18 呼び出し方 strLDAP = "LDAP //DC=example,DC=co,DC=jp" strName = "username" Set objUser = GetUserObject(strLDAP,strName) MsgBox objUser.Name 関数本体 Function GetUserObject (strLDAP,strName) Const ADS_SCOPE_SUBTREE = 2 Set objConnection = CreateObject("ADODB.Connection") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" Set objCommand = CreateObject("ADODB.Command") Set objCommand.ActiveConnection = objConnection objCommand.Properties("Page Size") = 1000 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE samAccountNameは一意のはず(たぶん。調査した範囲では間違いなく。) objCommand.CommandText = "SELECT distinguishedName FROM " strLDAP _ " WHERE objectCategory= user AND samAccountName= " strName " " Set objRecordSet = objCommand.Execute IF objRecordSet.RecordCount = 1 Then objRecordSet.MoveFirst strDN = objRecordSet.Fields("distinguishedName").Value Set objUser = GetObject("LDAP //" strDN) Set GetUserObject = objUser Else Set GetUserObject = Nothing End If End Function ファイルサーバーリソースマネージャ用にSMTPサーバーを立てる 2008/04/17 ファイルサーバーリソースマネージャでメール通知を出させようと思ったら、smtpサーバーの設定がほんとにアドレスしか設定できない。 匿名アクセスのみって、大丈夫なのかよと思いつつ、やむなくsmtpサービスを有効にすることに。 なにかしらドメイン内だけに限定するような設定あるだろ、たぶん。 ということで↓ Windows Server 2003 の IIS SMTP 仮想サーバーでメールの中継を防ぐ方法 1.[プログラムの追加と削除]→[Windows コンポーネントの追加と削除]→[アプリケーション サーバー]→[詳細]→[インターネット インフォメーション サービス(IIS)]→[詳細]→[SMTPService]をチェック。 結構深い。CDは要求されたけど再起動は不要(これ結構重要)。 2.IISマネージャに[既定の SMTP 仮想サーバー]が追加されるので [既定の SMTP 仮想サーバー]を右クリック→[プロパティ]→[アクセス]タブで以下の2点を設定 [接続]→[以下のリストに含まれるコンピュータのみ]をチェックして、127.0.0.1とサーバーのアドレスを追加 [中継]→[以下のリストに含まれるコンピュータのみ]をチェックして、127.0.0.1とサーバーのアドレスを追加 この記事も参考になった↓ 実例で学ぶSBS 2003ネットワーク構築と運用 第2回 SBS 2003のメール設定 4．メールのオープン・リレー対策（2） WSHで配列の比較にScripting.Dictionaryを使って高速化 2008/04/05 検索後：リニアサーチ、Linear Search、ハッシュテーブル Active Directoryつか、WSHだけど、WSHをADの管理にしか使ってないからとりあえずココで。 二つの配列の内容を比較するのに馬鹿ループ(リニアサーチ)とDictionaryでどのくらい速度が違うのかを計測。 データ数 1000×1000 65536×65536 Dictionaly 0.98秒 1.97秒 リニアサーチ 113.16秒 終わらないから強制終了ｗ サンプルソース Set fso = CreateObject( "Scripting.FileSystemObject" ) lines1にテキストファイルからリスト1を読み込み Set ts = fso.OpenTextFile( "List1.txt", 1 ) lines1 = Split( ts.ReadAll, vbCrLf ) ts.Close lines2にテキストファイルからリスト2を読み込み Set ts = fso.OpenTextFile( "List2.txt", 1 ) lines2 = Split( ts.ReadAll, vbCrLf ) ts.Close ■Dictonaryを使用した存在確認 start1 = timer Set dic = CreateObject( "Scripting.Dictionary" ) For i = 0 to Ubound(lines) - 1 dic.Add lines(i) , 0 Next For i = 0 to Ubound(lines2) - 1 If dic.Exists(lines2(i)) = True Then End If Next elapsed 1= timer1 - start ■リニアサーチを使用した存在確認 start2 = timer For i = 0 to Ubound(lines) - 1 For j = 0 to Ubound(lines2) - 1 IF lines(i)=lines2(j) Then Exit For Next Next elapsed2 = timer - start2 ■結果表示 MsgBox "Dictionaly " elapsed1 vbcrlf "リニアサーチ " elapsed2 テキストファイルからユーザーの一覧を読み込んで「ユーザーは次回ログオン時にパスワード変更が必要」に設定 2008/04/05 検索語：スクリプト、WSH とりあえず組んだ。エラー処理とかしてないけど。 strPath = "C \Documents and Settings\Administrator\デスクトップ\Users.txt" strLDAP = "LDAP //dc=example,dc=co,dc=jp" Const ADS_SCOPE_SUBTREE = 2 Set fso = CreateObject( "Scripting.FileSystemObject" ) Set ts = fso.OpenTextFile( strPath, 1 ) lines = Split( ts.ReadAll, vbCrLf ) ts.Close Set dicUsers = CreateObject( "Scripting.Dictionary" ) For i = 0 to Ubound(lines) - 1 dicUsers.Add lines(i) , 0 Next Set objConnection = CreateObject("ADODB.Connection") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" Set objCommand = CreateObject("ADODB.Command") Set objCommand.ActiveConnection = objConnection objCommand.Properties("Page Size") = 1000 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE objCommand.CommandText = "SELECT distinguishedName,CN FROM " strLDAP " WHERE objectCategory= user " Set objRecordSet = objCommand.Execute objRecordSet.MoveFirst Do Until objRecordSet.EOF strDN = objRecordSet.Fields("distinguishedName").Value IF dicUsers.Exists(objRecordSet.Fields("CN").Value) Then Set objUser = GetObject("LDAP //" strDN) objUser.pwdLastSet = 0 objUser.SetInfo End If objRecordSet.MoveNext Loop 参考アドレス Hey, Scripting Guy! ある OU のすべてのユーザーが次にログオンしたときにパスワードの変更を要求する方法はありますか テキストファイル一括入力と連想配列 グループポリシーオブジェクトエディタで設定した項目がレポートで正しい名称で表示されない 2008/04/02 グループポリシー管理コンソールのレポートで、[管理用テンプレート]-[レジストリの追加設定]という項目が表示され いくつかの設定の表示名が見つかりません。グループ ポリシーの管理が使用している .ADM ファイルを更新すると、この問題を解決できる場合があります。 Software\Policies\Microsoft\Windows\CurrentVersion\Internet Settings\ListBox_Support_ZoneMapKey 1 Software\Policies\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMapKey\... と表示されている。 調べてみると [コンピュータの構成]-[管理用テンプレート]-[Windows コンポーネント]-[Internet Explorer]-[インターネットコントロールパネル]-[セキュリティページ] 内の項目 [サイトとゾーンの割り当て一覧] に設定した内容だった。 コンピュータのSIDの取得 2008/01/29 以前から調査していたコンピュータのSIDの取得方法がやっとわかった。 http //www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?mode=viewtopic topic=34260 forum=6 start=0 HKEY_LOCAL_MACHINE\SAM\SAM\Domains\Account\Aliases\Members\ HKEY_LOCAL_MACHINE\SECURITY\SAM\Domains\Account\Aliases\Members\ 管理者アカウントでも見ることはできなくて、システムアカウントでアクセスする必要がある。 問題はこの後で、これを読み出すのはいいとして、ファイルとして保存したとすると、漏洩したときにどのぐらいセキュリティにダメージがあるのかがわからない。暗号化フォルダなどはこれで解析できそうだけど。 普通のユーザーのSIDはレジストリエディタで丸見えだけど。どうなのかな。 2008/01/30 追記：とりあえず暗号化フォルダの復号もできないし、SIDは公開されるのが前提のようなのでちょっと安心。 SIDについての詳細な記事があったのでメモ 2008/01/29 検索語：セキュリティID http //codezine.jp/a/article/aid/434.aspx Windows 2000 と Windows XP のコンピュータ アカウントのリセット 2008/01/29 ときどきPCがドメインから追い出されることがあるのはたぶんこのせいか。 resetは知らなかったのでとりあえずメモ。 http //support.microsoft.com/default.aspx?scid=kb%3Bja%3B216393 ローカル管理者のパスワードを一括で更新するスクリプト ドメインに所属するクライアントのローカル管理者のパスワードを一括で更新します。 ドメインの管理者権限を持つユーザーでログインして実行します。 実際にはクライアントが起動していないと変更されませんので、スタートアップスクリプトを併用することも考えたほうがよいかも。 でもパスワード文字列を読み取れるファイルに記録してしまうとまずいので悩んでいるところです。 データベースを使って変更の成否を記録しながら一定間隔で個別に流すかなぁ。 なにかいい方法を知っている人がいれば教えてください。 strLogPath="Log.txt" strPWD="ExamplePassword" Const ADS_SCOPE_SUBTREE = 2 ADODBコネクションの作成 Set objConnection = CreateObject("ADODB.Connection") objConnection.Provider = "ADsDSOObject" objConnection.Open "Active Directory Provider" ADODBコマンドでドメインに所属するコンピュータを問い合わせ Set objCommand = CreateObject("ADODB.Command") Set objCommand.ActiveConnection = objConnection objCommand.CommandText = "SELECT Name,OperatingSystem FROM LDAP //DC=example,DC=co,DC=jp WHERE objectClass= computer " objCommand.Properties("Page Size") = 1000 objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE Set objRecordSet = objCommand.Execute 各クライアントの成否を記録するログファイルを生成 set fso = CreateObject("Scripting.FileSystemObject") set fp = fso.CreateTextFile(strLogPath,True) On Error Resume Next objRecordSet.MoveFirst Do Until objRecordSet.EOF strComputer = objRecordSet.Fields("Name").Value サーバーの管理者パスワードを変えてしまわないようにOSで限定しています。 これはまあOU使ってもいいですし、絞り方はいろいろ。 If objRecordSet.Fields("OperatingSystem").Value="Windows XP Professional" Then Set objUser = GetObject("WinNT //" strComputer "/Administrator, user") objUser.SetPassword strPWD objUser.SetInfo fp.WriteLine(strComputer "," Err.Number " " Err.Description) End If objRecordSet.MoveNext Loop fp.Close Msgbox "Ok" SQLServer200のサイレントインストール http //support.microsoft.com/kb/257716/ja http //hehao1.seesaa.net/article/5454554.html setup.exeでサイレントインストール 2007/11/08 検索語：インストールシールド Install Shield 応答ファイル http //www33.ocn.ne.jp/~loreley/FSB/installs01.html Setup.exe -a -r -f1c \testSet.iss で応答ファイルを作成して Setup.exe -s -f1c \testSet.iss でサイレンとインストール、という感じ。 関連URL http //www.microsoft.com/japan/technet/desktopdeployment/bdd/2007/AppMgmt_6.mspx Windows Server 2003 R2 でファイル サーバー リソース マネージャを有効にする 2007/10/26 ファイルサーバーでクォータを使おうと思ったら、2003R2からあるはずのFSRMが見当たらず。 ああでもないこうでもないといじりまわしても見つけられず、検索をかけたら下記サイトが http //www.microsoft.com/japan/technet/itsolutions/msit/valuecard/msfsrmvc.mspx ファイル サーバー リソース マネージャを有効にします。 って・・・俺はどうやって有効にするか知りたいんだよ！ 結局TeckNetで 「ファイル サーバー リソース マネージャのコンポーネントを使用する」 http //www.microsoft.com/japan/technet/windowsserver/2008/library/0cd724af-b8c7-4fe8-bcd7-0889f35b5ec8.mspx を見つけました。 ああ、[プログラム の追加と削除] の [管理ツール]ね。 そういえばグレーになってたけど中を開けて見なかった私が悪いのです。 アプリケーションログに5分おきにイベント1030と1058が記録される。 2007/10/22 イベントID 1030 グループ ポリシー オブジェクトの一覧を照会できません。このエラーの理由を説明するようなメッセージをポリシー エンジンが記録していないかどうか、イベント ログを確認してください。 詳細な情報は、http //go.microsoft.com/fwlink/events.asp の [ヘルプとサポート センター] を参照してください。 イベントID 1058 GPO cn={XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX},cn=policies,cn=system,DC=example.co.jp,DC=example,DC=co,DC=jp 用のファイル gpt.ini にアクセスできません。ファイルは場所 \\example01.co.jp\sysvol\example01.co.jp\Policies\[XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX}\gpt.ini に存在する必要があります (アクセスが拒否されました。 )。グループ ポリシーの処理は中止されました。 詳細な情報は、http //go.microsoft.com/fwlink/events.asp の [ヘルプとサポート センター] を参照してください。 いつのころからかこのエラーが5分置きに記録されていてうっとおしかったんで、調べたらKBにありました。 http //support.microsoft.com/kb/842804/ja 「グループ ポリシーの処理が機能せず、ドメイン コントローラのアプリケーション ログにイベント 1030 および 1058 が記録される」 ただ、最初読んだときは「最新のService Packで解決する。」と書いてあったので、「ウチは最新だからちがうのかなぁ」とスルーしてしまった。 かなり時間を使ってしまってから舞い戻り、精読したら、「注：Service Pack のインストール後でも、「レジストリ情報」に記載されている手順を実行する必要があります。」と書かれていたorz。 [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\WaitForNetwork]にDWORD値で1を設定し、再起動したら解決。 レジストリファイルが必要な方はどうぞ→http //www31.atwiki.jp/memo77/?cmd=upload&act=open&page=Active+Directory&file=WaitForNetwork.zip dsaddを使ってActive Directoryにユーザーを追加する 2007/10/22 自分用のサンプル構文 dsadd user "CN=山田 太郎,OU=部門1,OU=Domain Users,DC=example01,DC=example,DC=or,DC=jp" -ln 山田 -fn 太郎 -display 山田 太郎 -upn taro-yamada@example.co.jp -pwd Example01 -mustchpwd yes -memberof "CN=総務部,OU=Security Groups,DC=example01,DC=example,DC=co,DC=jp" "CN=総務部長,OU=Security Groups,DC=example01,DC=example,DC=co,DC=jp" "CN=防火責任者,OU=Security Groups,DC=example01,DC=example,DC=co,DC=jp" "CN=プロジェクトチーム１,OU=Security Groups,DC=example01,DC=example,DC=co,DC=jp" -disabled no グループポリシーオブジェクトエディタでびっくり 2007/08/28 ソフトウェアインストールのところにmsiファイルをドラッグ＆ドロップできるのね。知らなかった。 レジストリの配布をグループポリシーでやるべきか 2007/08/23 スクリプト中でregedit /S "filepath" の方がシンプルで見通しがよく、即効性があるが・・・ 手法 対象 特徴 グループポリシー HKLM ローカル管理者でも変更できない。 グループポリシー HKCU ローカル管理者でも変更できない。 スタートアップスクリプト HKLM ユーザーは変更できない。 ログオンスクリプト HKCU ユーザーが変更できる。 従って、 1.ユーザーが変更してもよいがデフォルト値を配布したい場合は一回だけregedit /s filename *1 2.HKCU対象でユーザーに変更させたくない値はグループポリシー(HKCU) 3.HKLM対象はスタートアップスクリプトでもグループポリシーでもよい。 手間を考えるとスクリプト。ローカル管理者にも変更させたくなければグループポリシー。 MEMO 試してないけど疑問 1.Policyの下ってスクリプトで配布できるんだろか。 2.ローカル管理者ってほんとにPolicyを無効化することできない？ 無線環境のPCにグループポリシーでアプリケーションを配布する。 2007/08/20 グループポリシーで設定してみても下記のエラーで失敗している。 「コンピュータ ネットワークためのドメイン コントローラ名を取得できません。(指定されたドメインがないか、またはアクセスできません。 )。グループ ポリシーの処理は中止されました。」 http //support.microsoft.com/kb/840669/ja この記述にしたがってレジストリを修正すると成功した ⇒ 【regファイルダウンロード】 [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon] "GpNetworkStartTimeoutPolicyValue"=dword 0000003c admファイルを使用してレジストリを配布する この辺を参考に http //tod.cocolog-nifty.com/diary/2007/07/active_director_450e.html 例えばユーザーのログイン時にOnlyDetlを実行するレジストリを設定するなら CLASS USER CATEGORY !!CustomRegistry CATEGORY !!PathOfRun KEYNAME "Software\Policies\Microsoft\Windows\CurrentVersion\Run" POLICY !!OnlyDetl_Title EXPLAIN !!OnlyDetl_Explain PART !!OnlyDetl_Path EDITTEXT VALUENAME OnlyDetl MAXLEN 60 END PART END POLICY END CATEGORY END CATEGORY [strings] CustomRegistry="配布レジストリ" PathOfRun="ログイン時に実行するアプリケーション" OnlyDetl_Title="OnlyDetl" OnlyDetl_Explain="OnlyDetlの実行パスを設定します。" OnlyDetl_Path="実行パス " という感じです。 注意事項として、コピペした使ったときに[strings]の後ろにスペースが入っていると、「[strings]セクションに文字列xxxが見つかりません」みたいなエラーで蹴られます。 かならず余分なスペースは除去しましょう。前後も1行空行のほうがよいかも。 ローカルセキュリティポリシーはDefault Domain Controllers Policyでなければ有効にならない？ 2007/08/14 できるだけDefault Domain Controllers Policyをいじりたくないので、リモート専用のユーザーを別のGPOで指定してみたが有効にならなかった。 ローカルセキュリティポリシーはDefault Domain Controllers Policyでなければいけないのかもしれない。 ※資料を見つけているわけではないので未確定情報です。もしご存知の方がいれば情報をいただけるとありがたいです。 Acrobat Reader 8.1をmsiファイルで配布する 2007/08/07 いまや Acrobat Reader は必須といってよいと思いますが、msiファイルとしては提供されていません。 しかし内部的にはmsiファイルで構成されており、下記の手順で抽出することができます。 Extract the Adobe Reader 8 msi installer for enterprise deployment Acrobat 8.x/Adobe Reader 8.x をコマンドラインからインストールまたはアンインストールする方法（Windows) 間単に書くとこんな感じです。 1.http //ardownload.adobe.com/pub/adobe/reader/win/8.x/8.1/jpn/AdbeRdr810_ja_JP.exeをダウンロード 2.ダウンロードしたファイルをコマンドラインオプションをつけて実行 AdbeRdr810_ja_JP.exe -nos_ne-nos_ne 3.[C \Documents and Settings\[ユーザー名]\Local Settings\Temp\Adobe Reader 8]に下記ファイルが出力される。 abcpy.ini AcroRead.msi Data1.cab Setup.exe setup.ini 4.AcroRead.msiとData1.cabを同じフォルダにおいて、グループポリシーで配布する。 Flash Player をmsiファイルで配布する 2007/08/08 adobeへの無料登録をするとダウンロードサイトのアドレスを貰えるようです。 http //d.hatena.ne.jp/tkssoft/20070602/p1 コンピュータ名の長さの制限など 2007/07/08 http //technet2.microsoft.com/WindowsServer/ja/library/8ec96981-6b1a-48ec-bd3e-d8d43bc814311041.mspx?mfr=true とりあえずドメイン名まで含めてnvarchar(256)だけど、15文字以内に収めておくのが揉めない。 ADSI関連で物凄く参考になるサイト 2007/07/08 http //blog.livedoor.jp/mokurin/archives/cat_50022192.html スクリプトでOutlook Expressのアカウントを修正する 2007/07/02 契約してるホスティングサービスからメールアカウントのサーバー名を変更してくれと通知。 1台1台やってられないのでスクリプト作ってみた。 Outlook Expressのアカウントって、CurrentUserが使えないのね。SIDまで取らなきゃいけなかった。 グループポリシーでログオンスクリプトに設定して解決。 ログインアカウントのSIDをWMIを使用して取得 Set oWMI = GetObject("winmgmts \\.\root\cimv2") Set WshNetwork = WScript.CreateObject("WScript.Network") Set oAccount = oWMI.Get ("Win32_UserAccount.Name= " WshNetwork.UserName " ,Domain= " WshNetwork.UserDomain " ") strKeyBase = oAccount.SID "\Software\Microsoft\Internet Account Manager\Accounts" SIDに登録されたインターネットアカウントをレジストリから列挙 const HKEY_USERS = H80000003 Set oReg=GetObject("winmgmts {impersonationLevel=impersonate}!\\.\root\default StdRegProv") oReg.EnumKey HKEY_USERS, strKeyBase, arrSubKeys 各アカウントの値をチェックして更新 For Each subkey In arrSubKeys strKeyPath = strKeyBase "\" subkey strValueName = "POP3 Server" oReg.GetStringValue HKEY_USERS, strKeyPath , strValueName, strValue If Not IsNull(strValue) Then If strValue="mail.example.co.jp" Then oReg.SetStringValue HKEY_USERS, strKeyPath , strValueName , "pop.example.co.jp" End IF End If strValueName = "SMTP Server" oReg.GetStringValue HKEY_USERS, strKeyPath , strValueName, strValue If Not IsNull(strValue) Then If strValue="mail.example.co.jp" Then oReg.SetStringValue HKEY_USERS, strKeyPath , strValueName , "smtp.example.co.jp" End IF End If Next ACLからフルコントロールを持つアカウントを削除してしまった場合の対処 2007/06/06 http //support.microsoft.com/kb/308421/ja 管理者アカウントで上位フォルダにて「サブコンテナとオブジェクトの所有者を置き換える」を行うと、アクセス権を変更できるようになる。 もともと所有者に管理者アカウントが表示されていても、これをやるのとやらないので挙動が違います。 検索語：NTFS/消せない/ファイル/継承/読み取り/変更/削除/SYSTEM/Administrators/フォーマット ちゃうねん 2007/05/17 oがないのがレジストリ…… oがあるのがアクティブディレクトリ…… ちょっと時々ごっちゃになるねん わかってるねん わかってるねんで？ バカにしたらあかん oがあるのがレジストリ それがごっちゃに…… わかってるねんで!? 正：Registry 誤：Registory 正：Active Directory 誤：Active Directry 信頼関係 2007/05/07 検索語：一方向の信頼関係/外部信頼関係 http //www.atmarkit.co.jp/bbs/phpBB/viewtopic.php?topic=28249 forum=6 8 2007/05/15 検索語：セキュリティグループ/グローバル/ドメインローカル/ユニバーサル グループ・アカウントの種類を知る http //www.atmarkit.co.jp/fwin2k/win2ktips/737groups/groups.html Defaul Domain Policyの 復旧 2007/05/16 オペレートミスで[Defaul Domain Policy]を削除してしまうという失態。復旧について調査すると、dcgpofixというコマンドを使えばよいらしい。 http //www.atmarkit.co.jp/fwin2k/win2ktips/625dcgpofix/dcgpofix.html やってみると下記エラーが出て復元に失敗する。 このドメインの Active Directory スキーマ バージョンと、このツールによってサポートされているバージョンが一致しません。GPO は /ignoreschema コマンド ライン パラメータを使用すると復元できます。ただし、このツールの更新バージョンを取得することをお勧めします。このツールの更新バージョンには、Active Directory スキーマの更新バージョンが含まれている可能性があります。間違ったスキーマで GPO を復元すると、予期しない動作が発生する場合があります。 原因は http //support.microsoft.com/kb/932445/ja 『Windows Server 2003 R2-based ドメインで Dcgpofix.exe コマンド ライン ツールを使用すると、エラー メッセージ 「このドメインのスキーマの Active Directory バージョンとこのツールによってサポートされたバージョンが一致しません」』 R2だと出るということ。/ignoreschemaオプションで強行する。 次のドメインの既定のドメイン ポリシーを復元しようとしています。 xxx.yyy.zzz.jp 続行しますか Y/N ? y 警告 この操作を行うと、選択された GPO で行われた ユーザー権利の割り当て がすべて置き換えられます。これにより一部のサーバー アプリケーションでエラーが発生する可能性があります。 続行しますか Y/N ? で[y]を押して実行。 既定のドメイン ポリシーは正しく復元されました 注意 既定のドメイン ポリシーの内容のみが復元されました。このグループ ポリシーオブジェクトへのグループ ポリシー リンクは変更されませんでした。 既定では、既定のドメイン ポリシーはドメインにリンクされています。 ドメインコントローラポリシーだと元にもどらない部分を手動で補正しなければいけないらしい。 http //support.microsoft.com/kb/833783/ja 今回はドメインポリシーなので無関係。 あとはポリシーオブジェクトをドメインにバインドして終了。 変な影響が出なければいいけど。 comment このページの記述で聞きたいこととか間違ってることとかありましたらコメントを。 コンピュータ名の一覧を元にローカルAdministratorのパスワードを変更するスクリプトの4行目、stLogPathではなくstrLogPathではないでしょうか。 -- (shimazoe) 2010-06-08 11 18 19 ご指摘ありがとうございます。たぶんそうだと思うので直しました。コピーミスかな？ -- (memo77) 2010-06-08 11 55 04 「XPクライアントに特定のユーザー／グループのみログインを許可する」を私もやっていますが、プリンタなどドライバインストールで失敗します。そんときだけ戻してます。 -- (を) 2010-06-13 20 25 02 名前 コメント すべてのコメントを見る
https://w.atwiki.jp/rioatwiki/pages/16.html
Technology and Media BBC Football fans spending millions on club crypto-tokens Maker of suicide pod plans to launch in Switzerland Instagram boss calls for more teen protection Amazon fined $1.2bn by Italian regulators Canadian man charged over ransomware attacks Euros top Google's year in search in UK UK to phase out 2G and 3G by 2033 TikTok jumps on online shopping bandwagon 5G in Coverdale Ancient valley set for telecoms upgrade Instagram announces changes ahead of political grilling Bitcoin 'founder' wins right to keep billions of dollars Ubisoft NFTs, called 'Digits', launch for in-game items What is artificial intelligence and why is it important? What are algorithms and how do they work? What are quantum computers and what are they used for? Bitcoin What are crypto-currencies? How do you turn off the internet? Shelby Lynch TikTok influencer on dispelling disability myths Divine Comedy Robot Ai-da creates a poem to honour Dante CEO Secrets 'Call centre work trained me to be a CEO' Virtual yacht sells for $650,000 and other tech news Why Mars-bound astronauts may go to Iceland first The country that is Europe's hub for cargo bikes Lara Croft 25 years of Tomb Raider and a British gaming icon Africa's patchy transport network gets a tech boost The tech helping shops - and Santa - deliver this Christmas Why broken African phones are shipped to Europe Can South Africa embrace renewable energy from the sun? The 99-year-old cyclist who has won a world silver medal The small nuclear power plants billed as an energy fix The mums using Instagram to offer advice to new parents 31 item(s) Last-Modified 2021/12/10 09 05 38 Financial Times IT Instagram tries to change image with altered algorithms The world needs to set new rules in space Amazon/antitrust €1.13bn Italian fine will set the tone for other EU competition watchdogs Miro targets $17bn valuation as demand for remote work tools surges US to blacklist Chinese AI company SenseTime over Xinjiang ahead of IPO ‘Essentially dead’ China closes off foreign investors’ route into tech deals Researchers train AI on ‘synthetic data’ to uncover Syrian war crimes Kremlin penetrates deeper into online world of Russians Instagram chief denies platform prioritises profit over users’ mental health China set to make tech VIEs unviable, closing foreign ownership loophole Elizabeth Holmes wraps up testimony in Theranos fraud trial Roku/YouTube David’s Roku takes on the Google Goliath Tech IPOs newly listed companies are growing more expensive China tech blacklist could hurt homegrown start-ups most Apple reaches quiet truce over iPhone privacy changes Apple’s Christmas supply chain nightmare Meet private equity’s king of SaaS Quantum computing fear of super hackers will drive sales of specialists China to tighten rules for tech companies seeking foreign funding From angry Adele fans to broken robot vacuums AWS outage ripples through US European tech’s record funding year Intel/Mobileye IPO great side bet, shame about the core business Europe needs to wake up to the costs of hosting massive data centres Gig economy/Uber UK ruling adds to pressure on shaky business model Death’s Door — an engrossing game about being fragile in a dangerous world 25 item(s) Last-Modified 2021/12/10 05 49 31 Financial Times Media Alden Global/Lee Enterprises the last stand of the US local newspaper business France releases Saudi man arrested on suspicion of role in Khashoggi murder Lloyd’s List to chart new course as Informa hoists ‘for sale’ sign Trump Spac Former president needs to reach mainstream acceptance to hit user goals US regulators probe Trump social media Spac deal Three tech giants control half of advertising outside China CNN fires Chris Cuomo after misconduct claims Discovery in talks with BT Sport to hijack sale to DAZN BuzzFeed puts brave face on investor exodus ahead of trading debut MailOnline publisher Martin Clarke to step down Media-savvy business professors look beyond the lecture hall Rothermere sweetens bid to take Daily Mail publisher private DMGT sweetened deal will leave a bitter aftertaste Barry Diller’s media empire settles legal fight with Tinder founders FT-Omdia Digital Economies Index spotting the next tech growth markets Online streaming looks to Asia for steady flow of subscribers CNN suspends host Chris Cuomo over defence of his brother UK magazine group Future’s profits more than double What influences cryptocurrency values? Disney omits ‘Simpsons’ Tiananmen visit from Hong Kong offering How to thrive as a mid-life woman in the creative industries UK creative industries making a pig’s ear of their value Adele and Spotify chasing payments EU takes aim at political ads on social media China intensifies crackdown on celebrity culture and fans 25 item(s) Last-Modified 2021/12/10 03 24 15 Washington Post showrss プラグインエラー RSSが見つからないか、接続エラーです。
https://w.atwiki.jp/v-ranking/pages/118.html
KAITO新曲ランキング KAITO新曲ランキング #2 PL sm2258556 今度こそアッーイスッーウマウマ(゜∀゜) 替え歌をKAITOにKAITO SUPER HIT!０４位 sm2250148 KAITOオリジナル曲 「恋するアプリ」KAITO SUPER HIT!１８位 sm2270564 【KAITOオリジナル】Bittersweet Memories... II【イラストつき】 新曲０１位 imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2272216 Time SignalをKAITO一人で歌わせてみた 新曲０２位 sm2245359 【KAITO】輝け！ラーメンマン【拉麺】 新曲０３位 sm2230359 【いきてる】ＫＡＩＴＯにＤａｙｓを歌ってもらった【あかしに】 新曲０４位 sm2240816 【KAITO】蒼嵐・２【オリジナル】 新曲０５位 imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2245509 【KAITO】RADICAL DREAMERS～盗めない宝石～（低音ver.） 新曲０６位 sm2213539 【KAITO】かいとかいとにしてあげる★販促ver.【自ら営業】 新曲０７位 sm2271272 【VOCALOID】caramelldansen feat. KAITO 新曲０８位 sm2234046 【KAITO】マリオ水中BGM【替え歌】 新曲０９位 sm2188757 【全部KAITO】『KAITO～あにあに組曲～』を歌わせてみた【完成版】再うｐ 新曲１０位 sm2249643 【森山直太朗】KAITOが歌う『さくら（独唱）』（修正版）【KAITO】 新曲１１位 sm2249745 【ミクとMEIKOとKAITOと俺】アヴェマリア（ヴィクトリア）【歌ってみた】 新曲１２位 sm2199736 【KAITO】にゃにゃにゃっにゃっにゃっ～（楽譜が読めません） 新曲１３位 sm2231453 KAITOが「風邪のうた」を歌ってくれた 新曲１４位 sm2257848 KAITOに「えーりん！替え歌」を歌ってもらった（自重できませんでした） 新曲１５位 →sm2339596 sm2206423 うちのKAITOがDEENの「夢であるように」にもう一度挑戦しました 新曲１６位 sm2202319 【忍たMAD】組曲「ニコニコ動画」を歌わせてみた【KAITO＋α】 新曲１７位 sm2252260 KAITOに「もらい泣き」を歌わせてみた（今回は替え歌なしで） 新曲１８位 sm2189759 KAITOが歌う「SAD EMOTION」【TMN】 新曲１９位 imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2198704 KAITOにオリジナル曲『Kiss! Kiss! Kiss!』を歌ってもらったVer.2 新曲２０位 imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm1045202 KAITOでサーカスチャーリーPICKUP1 sm1046782 [VOCALOID][KAITO] この道わが旅 http //www.nicovideo.jp/watch/sm1046782?PICKUP2 sm1837245 【MEIKO】愛のうたを歌ってもらった【KAITO】PICKUP3 sm1394623 KAITOがチーターマンを歌いますPICKUP4 imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2112313 KAITOが、うがい薬のCMに出たようですCM imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2199657 【修正】KAITOでボランタリーOP imageプラグインエラー ご指定のURLはサポートしていません。png, jpg, gif などの画像URLを指定してください。 sm2222552 KAITO「風に立つライオン」ED
https://w.atwiki.jp/vocaloidenglishlyric/pages/712.html
【Tags Cycle-P Gumi tT O】 Original Music title お茶 English music title Tea Romaji music title Ocha Music Lyrics written, Voice edited by サイクルP (Cycle-P) Music arranged by サイクルP (Cycle-P) Singer(s) Gumi (Megpoid) Click here for the original Japanese Lyrics English Lyrics (translated by vgboy / vgperson)： Since when was it I was at your side, And we spent every day together? Yet I ve gotten all too used to it, Everything too ordinary Only I m looking, I keep thinking I was scared of hearing an answer From now on, always, forever, I wished you would be there Even if I reach out my arm, I still can t tell how far you are So small, yet so wide - all that remains is a gap What day was it that, by you, A beautiful person stood? And it wasn t me there; It was someone beautiful My ears can t be reached, my thoughts are shallow There s no bringing back your voice I couldn t build up a boundless future with you, But here in my hands, these memories will always stay, So these crying-then-cleared, heavy eyes are disguised with makeup If I stay here any longer, I ll be in your way I ve decided now, I m prepared; I ll be bound without bending A world without me isn t such a lonely thing, is it? Tomorrow, I m sure to be in the forest, drinking delicious tea, right? From now on, always, forever, you ll no longer be there I just want to vanish, so give me eternal, unwaking sleep And deep, deep in a dream, I ll feel your hands Good morning - the morning sun rises, And I wake to a gentle voice Through my overflowing tears, I heard words of love Romaji lyrics (transliterated by vgboy / vgperson)： Itsukara ka kimi no soba ni ite Mainichi tomo ni sugoshita Amari ni sore ni naresugite Subete ga atarimae Watashi dake miteru sou omoitsudzukete Kotae kiku koto ga kowatta Kono saki zutto itsumademo irareru koto o negatta yo Watashi ga ude o nobishite mo kimi to ni kyori wa hakanai Tooi you de chikai you na sukima dake nokoru Itsu no hi ka kimi no tonari ni wa Kirei na hito ga tatteta Soko ni iru no wa watashi de naku Kirei na hito datta Mimi ni todokanai omoi nado asakute Nido to modoranai kimi no koe Mirai o kimi to dokomademo kizukeru koto wa nai keredo Watashi no kono te no naka ni wa omoide kitto nokoru kara Naite hareta omoi me o okeshou de gomakasu Mou watashi koko ni itsudzuketara jama da ne Ima kimeta kakugo magaranai you ni shibaru Watashi no inai sekai de mo samishii koto wa nai deshou Ashita wa kitto mori no naka oishii ocha ga nomeru deshou Kono saki zutto itsumademo irareru koto wa nakunatte Sonzai keshitai watashi ni eien ni samenu nemuri o Fukai fukai yume no naka de kimi no te ga fureru Ohayou asa no hi ga sashite Yasashii koe de me ga sameru Afureru namida sono naka de Ai no kotoba o kikimashita [Cycle-P, CycleP, Saikuru-P, SaikuruP]
https://w.atwiki.jp/sonyyoutube/pages/33.html
2008 October Support SONYYOUTUBE download downloader ダウンロード 保存 SONYYOUTUBE adultanimator.com, awe.jp, freudbox.com fliggo.com, freeporn.to, galleries.payserve.com, gekinavi.jp, google.com, keezmovies.com iwantthegay.com myanimesex.com mobie.jp, movie.teacup.com mofla.tv nozoki-ana.com, otakara-gazou.com paiblog.com, pornhub.com, sevenload.com spankwire.com, tu.tv, tvbreak.com, uol.com.br, tubeko.com, vidiac.com xnxx.com, xvideos.com wetdevil.com, download downloader ダウンロード 保存 2008november 2008december sonyyoutube hatubaibi
https://w.atwiki.jp/thunderstone/pages/221.html
Cardlist-Towers of Ruin HERO Card Name Number Class Cost STR Gold Light EXP VP Text Aird Cutpurse 6 Human･Thief･Level1 5 3 0 2 Physical Attack +1Village All players discard the top card of their deck. Gain the gold value of one discarded card. Aird Honeytongue 4 Human･Thief･Level2 10 3 2 3 Physical Attack +2Dungeon All players discard the top card of their deck. Gain the gold value of one discarded card. Gain Physical Attack equal to the gold value of one discarded card. Aird Seductress 2 Human･Thief･Level3 13 4 3 2 Physical Attack +3Dungeon All other players show their hands. Add one revealed hero to your hand. Return that hero to its owner s discard pile after the combat(even if it was destroyed). Bhoidwood Hunter 6 Elf･Ranger･Level1 6 5 -1 2 Physical Attack +2 Bhoidwood Stalker 4 Elf･Ranger･Level2 9 5 -2 3 Physical Attack +4Dungeon Switch the positions of two adjacent monsters in the hall. Bhoidwood Slayer 2 Elf･Ranger･Level3 12 6 -3 1 Physical Attack +6Dungeon Rearrange the hall. Caliginite Lurker 6 Dwarf･Thief･Level1 5 4 1 2 Physical Attack +1Add Physical Attack +2 if there is Darkness. Caliginite Prowler 4 Dwarf･Thief･Level2 9 4 1 3 Physical Attack +2Add Physical Attack +3 if there is Darkness. Caliginite Silencer 2 Dwarf･Thief･Level3 12 5 1 1 Physical Attack +3Dungeon Add Physical Attack +6 if there is Darkness. Criochan Sergeant 6 Human･Fighter･Level1 7 7 2 Physical Attack +2 Criochan Knight 4 Human･Fighter･Level2 10 7 3 Physical Attack +5 Criochan Captain 2 Human･Fighter･Level3 13 8 2 Physical Attack +8 Deepstrider Sentry 6 Elf･Ranger･Level1 6 5 -1 2 Physical Attack +2 Deepstrider Scout 4 Elf･Ranger･Level2 8 5 -1 3 Physical Attack +3Dungeon Reveal the top card of the dungeon deck. Give your heroes Attack +1 against monsters of that group. Place the revealed card on the top or bottom of the dungeon deck. Deepstrider Warden 2 Elf･Ranger･Level3 11 6 -2 2 Physical Attack +4Dungeon Reveal the top 2 cards of the dungeon deck. Give your heroes Attack +1 against monsters of revealed groups. Place the revealed cards on the top and/or bottom of the dungeon deck in any order. Drua Sacrist 6 Elf･Cleric･Level1 6 4 2 Physical Attack +2Dungeon Destroy 1 card in your hand. Drua Curseworn 4 Elf･Cleric･Level2 9 4 3 Physical Attack +3Village/Dungeon Destroy 1 card in your hand.Village/Dungeon Destroy 1 disease to draw 1 card. Drua Purifier 2 Elf･Cleric･Level3 12 5 2 Physical Attack +4Repeat Village/Dungeon Destroy 1 card in your hand.Repeat Village/Dungeon Destroy 1 disease to draw 2 cards. Glamercast Troubadour 6 Human･Thief･Wizard･Level1 6 2 1 2 Give each other hero Magic Attack +1. Glamercast Bard 4 Human･Thief･Wizard･Level2 9 3 1 3 Magic Attack +2Give each other hero Magic Attack +1. Glamercast Maestro 2 Human･Thief･Wizard･Level3 12 3 1 2 Magic Attack +3Give each other hero Magic Attack +2.Spoils Gain 1 XP per hero. Sternnkin Orcbane 6 Dwarf･Fighter･Level1 6 5 2 Physical Attack +2 Sternnkin Ettinbane 4 Dwarf･Fighter･Level2 9 5 3 Physical Attack +3Add Physical Attack +2 when fighting monsters with VP greater than this card s Strength. Sternnkin Dragonbane 2 Dwarf･Fighter･Level3 12 5 2 Physical Attack +4Add Physical Attack +3 when fighting monsters with VP greater than this card s Strength. Thundermage Summoner 6 Human･Wizard･Level1 7 3 1 2 Magic Attack +2 Thundermage Evoker 4 Human･Wizard･Level2 10 3 2 3 Magic Attack +3 Thundermage Bolter 2 Human･Wizard･Level3 13 4 2 2 Magic Attack +4Dungeon Place the monster from rank 1 into your discard pile(you do not collect XP). End your turn. Veilminder Martyr 6 Elf･Cleric･Level1 5 4 2 Magic Attack +1Dungeon Destroy this card to cancel one Battle or Aftermath effect on a monster in the hall. Veilminder Renunciate 4 Elf･Cleric･Level2 7 4 3 Magic Attack +2Dungeon Discard this card to cancel one Battle or Aftermath effect on a monster in the hall. Veilminder Priest 2 Elf･Cleric･Level3 11 5 2 Magic Attack +3Dungeon Discard this card to cancel all Battle or Aftermath effects. Draw 1 card. Whetmage Honer 6 Human･Wizard･Level1 5 2 2 Magic Attack +1Dungeon Level up a Regular or another level 1 hero. Add the newly leveled hero to your hand. Whetmage Finisher 4 Human･Wizard･Level2 8 2 3 Magic Attack +3Dungeon Level up another hero. Add the newly leveled hero to your hand. Whetmage Polisher 2 Human･Wizard･Level3 11 3 3 Magic Attack +5Dungeon Level up any number of heroes. Add the newly leveled heroes to your hand. You cannot level a hero that has already been leveled up this turn. VILLAGE Card Name Number Class Cost Gold Weight Light VP Text Bandia s Wisdom 8 Spell･Support 3 Dungeon Give each hero strength +1. Gain 3 XP. Discard 2 XP at the end of your turn. Battle-scarred Soldier 8 Villager･Mercenary 3 Village Draw a card.Dungeon Draw a card. If it is a hero it gains Physical Attack +2. Bounty Hunter 8 Villager･Mercenary 4 2 Dungeon Physical Attack +1.Spoils Buy 1 Village card. Dancing Sword 8 Weapon･Edged･Magic･Light 8 2 5 1 Physical Attack +2Even if not equipped, Magic Attack +2 (and still provides light). Dwarven Bear Hammer 8 Weapon･Blunt 4 2 6 Physical Attack +3Dwarf heroes of any Strength may equip this weapon. Falcon Arbalest 8 Weapon･Bow 7 2 3 Reduce the equipped hero s Attack to 0.Physical Attack +5 against rank 2 or higher. Filigree Amulet 8 Item･Magic･Light 2 3 2 You may buy a second card when you purchase this card.Destroy this card instead of discarding it at the end of the turn. Innkeeper 8 Villager 3 2 Village Destroy a villager or hero. You may buy an additional card this turn. King Caelan s Writ 8 Item 5 Village Destroy this card to place the top card of any hero stack on top of your deck. End your turn. Longsword 8 Weapon･Edged 5 3 5 Physical Attack +3 Mass Teleport 8 Spell･Support 5 Dungeon Draw 3 cards. You cannot use any more Dungeon abilities this turn(you may still equip weapons). Moonstone 8 Item･Light 5 2 2 Dungeon Draw 1 card. Pike 8 Weapon･Polearm 4 2 3 Physical Attack +2This hero is not affected by Battle effects. Ranger s Wilderness Map 8 Item 6 3 Dungeon Reveal the bottom card of the dungeon deck. If it is a non-guardian monster, you may switch it with a monster in rank 3 or deeper. Draw a card. Royal Summons 8 Spell･Auxiliary 8 Dungeon Add 3 Regulars from the village to your hand.Spoils Destroy 3 Regulars. Smuggler 8 Villager･Mercenary 5 1 React Destroy this card after a player loses a combat. Buy 1 card.Village Destroy 1 card with a gold value of 1 or higher to gain 4 gold. Snakehead Flail 8 Weapon･Blunt･Magic 3 1 3 Magic Attack +1Additional Magic Attack equal to the level of equipped hero. Summon Storm 8 Spell･Attack･Light 6 1 Village Put this card on top of your deck.Dungeon Magic Attack +2. Veteran Trainer 8 Villager 5 2 Village Gain XP equal to the number of monsters you revealed.Spoils Destroy this card to level up one hero without paying XP. MONSTER Card Name Number Class Ambusher Health Gold EXP VP Text Phoenix 2 Burnmarked･Fire･Level2 6 2 2 3 Battle Gain a curse.Trophy Gain 3 XP. Place Phoenix on top of the dungeon deck. Pyre Viper 2 7 2 2 3 Battle Each player must either show a curse or gain 2 curses. Hellhound 2 7 2 2 4 Battle Gain 1 curse. Each other player must discard 1 hero, or show a hand with none.Aftermath If you did not defeat this card, gain 1 curse. Blazing Grimalkin 2 8 2 3 3 Battle Each player may choose to discard 3 cards. If a player chooses not to, that player loses 1 XP. Charred Bruin 2 9 2 2 4 Battle Each player destroys 1 card. Blackflock Raveger 2 Corvaxis･Avian･Level2 6 2 2 3 Raid The active player destroys 1 card present. Blackflock Conniver 2 7 2 2 2 Battle If any Ambushers are in the hall, discard all equipped weapons. Blackflock Assassin 2 8 2 2 4 Battle If any Ambushers are in the hall, the active player destroys 1 hero. Plunderwing 2 O 5 2 3 4 Battle Reveal the top card of the active player s deck. Add its gold cost to this card s Health. If it is a weapon or item, destroy it. Slaughterwing 2 O 6 3 3 5 Battle Reveal the top card of the active player s deck. Add its gold cost to this card s Health. If it is a hero of level 2 or lower, destroy it. Ghul 2 Djinni･Efreet･Level3 6 2 2 4 Immune to fighters and edged weapons.Battle Gain 1 curse if you have no fighter. Ifrit 2 8 2 2 5 Immune to rangers and bow weapons.Battle Gain 1 curse if you have no ranger. Majnun 2 9 2 2 5 Immune to wizards and spells.Battle Gain 1 curse if you have no wizard. Marid 2 10 2 2 6 Immune to thieves.Battle Gain 1 curse if you have no thief. Cancel all Spoils abilities. Iblis 2 12 2 3 7 Immune to Clerics.Battle Gain 1 curse if you have no Cleric. Cancel all Light that is not provided by heroes. Magma Wyrm 2 Dragon･Fire･Level3 7 2 2 4 After a player visits the village, this card switches ranks with the monster in front of it.Breach Destroy the top 2 cards of each village and hero stack. Ash Dragon 2 8 2 3 5 Battle Discard all heroes of lever 1 or lower.Aftermath Destroy all items and weapons that provide Light. Cinder Drake 2 10 3 3 6 Battle Destroy 1 weapon.Aftermath Destroy 1 spell. Caldera Dragon 2 11 3 3 6 Global After each time a player uses an ability that drew 1 or more cards, that player must discard 1 card. Smokeplume Drake 2 9 3 2 7 Battle Discard 2 cards.Aftermath Destroy 1 hero with the highest Strength.Tropy Light -3 Drakeclan Shaman 2 Kobold･Humanoid･Level1 6 3 1 -2 When you defeat this monster, you may place it into any player s discard pile. Drakeclan Cutter 3 5 2 2 -1 When you defeat this monster, you may place it into any player s discard pile. Drakeclan Ambusher 3 O 4 0 1 1 When you defeat this monster, you may place it into any player s discard pile. Drakeclan Laird 2 7 2 2 3 Battle This card gains Health equal to the total Health of all other Kobolds in the hall. If you defeat this card, you also defeat each other kobold in the hall. You do not get XP for those kobolds. Ogre 3 Ogre･Humanoid･Level2 7 1 2 2 Aftermath Destroy 1 hero with Strength 3 or less. Ogrillon 3 7 2 2 3 Battle Discard 1 equipped weapon. Ogre Mage 2 8 2 2 4 Battle Discard 1 card with Magic Attack.Aftermath Destroy 1 hero with Strength 4 or less. Ettin 2 9 3 2 5 Battle Destroy 1 hero without Magic Attack.Aftermath Destroy 1 hero without Physical Attack. Soulstolen 1 Undead･Horde･Level1 4 2 2 2 Aftermath Destroy 1 unequipped hero.Trophy Physical Attack +1 against undead. 1 5 2 2 2 1 6 2 2 3 1 7 2 2 3 1 8 2 2 4 1 9 2 2 4 1 10 2 2 5 1 11 2 2 5 1 12 2 2 6 1 13 2 2 6 10 PlaceholderReplace with the top card of the Soulstolen stack. Warrior Bones 2 Undead･Skeleton･Level1 5 1 1 1 Trophy Physical Attack +1 Dwarven Ancestor 2 6 1 1 2 Battle If there is Darkness, gain 1 curse.Battle If you defeat this card s Health by 4 or more,each other player gains 1 curse. Ossuous 2 6 1 2 2 Cannot be fought unless a hero of level 1 or higher is present.Trophy Magic Attack +1. Necrophidius 2 7 2 2 2 Cannot be fought unless 2 or more heroes are present.Trophy You may destroy this card to level up a Regular or level 1 hero without paying XP. Shrouded Cadaver 2 7 2 2 3 Battle Gain 2 curses. Each other player gains 1 curse.Trophy You may discard this card to draw a card. Witherd Dryad 2 Undead･Treefolk･Level3 6 1 2 4 Immune to blunt weapons. Canker Trent 3 8 2 3 6 Aftermath If the Total Attack Value did not exceed this card s Health by 6 or more, draw 2 fewer cards at the end of the turn. Thorned Walker 2 10 2 3 6 Aftermath If the Total Attack Value did not exceed this card s Health by 2 or more, destroy 2 revealed monsters. Decayed Heartwood 2 11 2 3 7 Aftermath Destroy a hero with 5 or more Strength. Scabbark 1 13 3 4 8 Aftermath If the Total Attack Value did not exceed this card s Health by 2 or more, destroy all cards in your hand.Spoils Take another turn. Belac 1 Guardian･Thunderstone Bearer 8 3 3 4 Global Resolve all other monster s Battle effects twice.Battle Discard the hero with the highest Attack Value. Belac gains Health equal to that hero s Attack Value (including weapon). Stramst 1 Guardian･Thunderstone Bearer 12 3 3 4 Global When refilling the hall, Stramst does not move forward to an empty rank until the dungeon deck is depleted. Instead, refill the empty rank in front of him.Battle Destroy a Hero. Orseg 1 Guardian･Thunderstone Bearer 12 3 4 5 Orseg gains the Battle effects of each other monsters in the dungeon hall. BASIC Card Name Number Class LV Cost STR Gold Light EXP VP Text Regular 45 Basic 0 0 3 0 2 PhysicalAttack +1Dungeon If equipped with a polearm, draw a card. Card Name Number Class Cost Gold Weight Light VP Text Longspear 25 Weapon･Polearm･Basic 3 2 3 Physical Attack +1 Torch 25 Item･Light･Basic 3 2 1 SPECIAL Card Name Number Class Cost Gold Weight Light VP Text Thunderstone Shard 10 Item･Thunderstone 0 1 1 Dungeon One hero gains Strength +2.Spoils Gain 1 XP. Name Number Class Text Curse of Decay 4 Curse･Disease Attack-1Village/Dungeon If this it the first ability you have used this turn, destroy this card. You cannot use any more abilities this turn. Curse of Discord 4 Attack-1Village Lose 2 gold to destroy this curse. Curse of Horror 4 Attack-1Dungeon Destroy this curse. Reduce your Light to 0. You cannot equip any more weapons, use any other Dungeon abilities, or use any other Trophy effects this turn. Curse of Hostility 4 Attack-1Village/Dungeon Discard 2 XP to destroy this curse. Curse of Shame 4 Attack-1Village/Dungeon Destroy this curse. Draw 2 fewer cards when you draw a new hand. Curse of Sloth 4 Attack-1Dungeon Destroy this curse. Lower your total attack value by 3. You cannot equip any more weapons, use any other Dungeon abilities, or use any other Trophy effects this turn. Curse of Neglect 4 Attack-1Village/Dungeon Discard 2 cards to destroy this curse. Name Number Class Text Battle Hawk 1 Familiar 0XP Village Gain 2 gold.3XP Dungeon Light +1.6XP Dungeon Draw 1 card. Physical Attack +1. Brownie 1 0XP Village Gain 1 gold 1 additional buy.3XP Dungeon Magic Attack +1.6XP Dungeon Destroy 1 card to draw 1 card. Dire Wolf 1 0XP Village Draw 1 card.3XP Dungeon Physical Attack +1.6XP Dungeon Switch the positions of any 2 monsters in the hall. Imp 1 0XP Village Gain 1 XP.3XP Dungeon Switch the positions of 2 adjacent monsters in the hall.6XP Dungeon Discard 2 cards to draw 2 cards. Lesser Phoenix 1 0XP Village Discard this card to gain 3 gold.3XP Dungeon Discard this card to cancel 1 Battle effect.6XP Dungeon Discard this card to draw 2 cards. Pseudodragon 1 0XP Village You may buy 2 cards this turn.3XP Dungeon Light +2.6XP Dungeon Magic Attack +2. Shadow Cat 1 0XP Village Destroy a villager.3XP Dungeon If there is Darkness, Physical Attack +2.6XP Dungeon Cancel 1 Battle effect.
https://w.atwiki.jp/sampleisbest/pages/293.html
開発環境 Microsoft Visual C++ 2010 Express (SP1) 実行環境 Microsoft Windows XP Home Edition (SP3) プロジェクトの種類 Win32 プロジェクト プロジェクト名 BallisticCurve アプリケーションの種類 Windows アプリケーション 追加のオプション 空のプロジェクト BallisticCurve.cpp // BallisticCurve2 #define _USE_MATH_DEFINES #include Windows.h #include wchar.h #include math.h #define APP_NAMETEXT("BallisticCurve") #define dt0.1 #define g9.80665// 標準重力加速度(m/s^2) // 外部変数 HDC hdcMem = NULL; HBITMAP hBmp = NULL; // 関数プロトタイプ宣言 void Trace(LPCTSTR format, ...); LRESULT CALLBACK WndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam); void OnCreate(HWND hWnd, LPARAM lParam); void OnPaint(HWND hWnd); //============================================================================== int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE, LPSTR, int nCmdShow) { // ウィンドウクラスの登録 WNDCLASSEX wcx; ZeroMemory( wcx, sizeof wcx); wcx.cbSize= sizeof wcx; //wcx.style= CS_HREDRAW | CS_VREDRAW; wcx.lpfnWndProc= WndProc; wcx.hInstance= hInstance; wcx.hCursor= LoadCursor(NULL, IDC_ARROW); //wcx.hbrBackground= (HBRUSH)GetStockObject(BLACK_BRUSH); wcx.lpszClassName= APP_NAME; if (RegisterClassEx( wcx) == 0) { return 0; } // ウィンドウの作成 DWORD dwStyle = WS_OVERLAPPEDWINDOW ~WS_THICKFRAME ~WS_MAXIMIZEBOX; RECT rc; SetRect( rc, 0, 0, 640, 400); AdjustWindowRect( rc, dwStyle, FALSE); HWND hWnd = CreateWindow( APP_NAME, APP_NAME, dwStyle, CW_USEDEFAULT, 0, rc.right - rc.left, rc.bottom - rc.top, NULL, NULL, hInstance, NULL); if (hWnd == NULL) { return 0; } ShowWindow(hWnd, nCmdShow); UpdateWindow(hWnd); // メッセージループ MSG msg; while (GetMessage( msg, NULL, 0, 0)) { TranslateMessage( msg); DispatchMessage( msg); } return msg.wParam; } void Trace(LPCTSTR format, ...) { va_list arg_ptr; va_start(arg_ptr, format); TCHAR buffer[256]; int size = _vsnwprintf_s(buffer, _TRUNCATE, format, arg_ptr); va_end(arg_ptr); OutputDebugString(buffer); if (size 0) { OutputDebugString(L"...\n"); } } LRESULT CALLBACK WndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam) { switch (uMsg) { case WM_PAINT OnPaint(hWnd); return 0; case WM_CREATE OnCreate(hWnd, lParam); return 0; case WM_DESTROY if (hdcMem) DeleteDC(hdcMem); if (hBmp) DeleteObject(hBmp); PostQuitMessage(0); return 0; } return DefWindowProc(hWnd, uMsg, wParam, lParam); } void OnCreate(HWND hWnd, LPARAM lParam) { LPCREATESTRUCT pcs = (LPCREATESTRUCT)lParam; HDC hdc = GetDC(hWnd); hdcMem = CreateCompatibleDC(hdc); hBmp = CreateCompatibleBitmap(hdc, pcs- cx, pcs- cy); SelectObject(hdcMem, hBmp); PatBlt(hdcMem, 0, 0, 640, 400, BLACKNESS); SelectObject(hdcMem, GetStockObject(WHITE_PEN)); for (int deg = 15; deg = 75; deg += 15) { double v = 40.0;// m/s double a = deg * M_PI / 180; double x = 0.0;// m double y = 1.0;// m Trace(L"\na=%.1f\n", a * 180 / M_PI); MoveToEx(hdcMem, int(x * 4), 400 - int(y * 4), NULL); for (double t = 0; t 10.0; t += dt) { double vx = v * cos(a); double vy = v * sin(a) - g * dt; a = atan2(vy, vx); v = sqrt(vx * vx + vy * vy); v -= 0.002 * v * v * dt;// 空気抵抗 x += vx * dt; y += vy * dt; Trace(L"t=%.1f x=%.1f y=%.1f v=%.1fkm/h a=%.1f\n", t, x, y, v * 3.6, a * 180 / M_PI); LineTo(hdcMem, int(x * 4), 400 - int(y * 4)); if (y = 0.0) break; } } ReleaseDC(hWnd, hdc); } void OnPaint(HWND hWnd) { PAINTSTRUCT ps; HDC hdc = BeginPaint(hWnd, ps); Trace(L"OnPaint(%d, %d, %d, %d)\n", ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right, ps.rcPaint.bottom); //BitBlt(hdc, 0, 0, 640, 400, hdcMem, 0, 0, SRCCOPY); BitBlt(hdc, ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right, ps.rcPaint.bottom, hdcMem, ps.rcPaint.left, ps.rcPaint.top, SRCCOPY); EndPaint(hWnd, ps); }